Super League/Super League.iso/TUTORIAL/CURSO/WHERE.DXR/00016.ls

Text File | 1997-03-25 | 508 b | 27 lines

on enterFrame
  global var1, var2
  if chars(var2, 1, 5) = "tema1" then
    if chars(var2, 6, 6) = "p" then
      go("tema1pr")
    else
      go("tema1")
    end if
  end if
  if chars(var2, 1, 5) = "tema2" then
    if chars(var2, 7, 7) = "a" then
      go("insta2")
    else
      go("insta")
    end if
  end if
  if chars(var2, 1, 5) = "tema3" then
    go("tema3")
  end if
  if chars(var2, 1, 5) = "tema4" then
    go("tema4")
  end if
  if chars(var2, 1, 5) = "tema5" then
    go("tema5")
  end if
end